(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 11.2' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[      5737,        165]
NotebookOptionsPosition[      5426,        151]
NotebookOutlinePosition[      5783,        167]
CellTagsIndexPosition[      5740,        164]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"aa", "=", 
    RowBox[{"FileNames", "[", 
     RowBox[{"\"\<*\>\"", ",", 
      RowBox[{"NotebookDirectory", "[", "]"}]}], "]"}]}], ";"}], 
  RowBox[{
  "(*", "\:5217\:51fa\:6240\:6709\:7684\:76ee\:5f55\:548c\:6587\:4ef6", 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"aa", "=", 
    RowBox[{"Delete", "[", 
     RowBox[{"aa", ",", 
      RowBox[{"Position", "[", 
       RowBox[{
        RowBox[{"FileType", "/@", "aa"}], ",", "Directory"}], "]"}]}], 
     "]"}]}], ";"}], 
  RowBox[{"(*", 
   RowBox[{
   "\:5220\:6389\:76ee\:5f55\:7559\:4e0b\:6587\:4ef6", "\:ff0c", 
    "\:7528position\:51fd\:6570\:5b8c\:7f8e\:89e3\:51b3"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"cc", "=", 
    RowBox[{"StringSplit", "[", 
     RowBox[{"aa", ",", "\"\<.\>\""}], "]"}]}], ";", 
   RowBox[{"(*", 
    RowBox[{"\:4ece\:70b9\:5904\:5206\:79bb\:8def\:5f84\:4e3a", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"c", ":", 
          RowBox[{"\\\\", "desktop"}]}], ",", "nb"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"C", ":", 
          RowBox[{"\\\\", "desktop"}]}], ",", "txt"}], "}"}]}], "}"}]}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{"oo", "=", 
    RowBox[{"Union", "[", 
     RowBox[{"cc", "[", 
      RowBox[{"[", 
       RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}]}], ";", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\:53ea\:53d6\:5217\:8868\:5185\:90e8\:7b2c\:4e8c\:90e8\:5206", 
      RowBox[{"{", 
       RowBox[{"nb", ",", "txt"}], "}"}]}], "\:3002", "\:5e76\:53bb\:91cd"}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{"Quiet", "[", 
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{"CreateDirectory", "[", 
       RowBox[{
        RowBox[{"NotebookDirectory", "[", "]"}], "<>", "\"\<\\\\my\>\"", "<>",
         "n"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"n", ",", "oo"}], "}"}]}], "]"}], "]"}]}], 
  RowBox[{"(*", 
   RowBox[{
   "\:521b\:5efamytxt", "\:ff0c", "mynb\:7b49\:76ee\:5f55", "\:ff0c", 
    "\:5f02\:5e38\:5b58\:5728\:5c31\:95ed\:5634", "\:3002"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Do", "[", 
    RowBox[{
     RowBox[{"Print", "[", 
      RowBox[{
       RowBox[{"NotebookDirectory", "[", "]"}], "<>", 
       RowBox[{
        RowBox[{"StringSplit", "[", 
         RowBox[{"n", ",", "\"\<.\>\""}], "]"}], "[", 
        RowBox[{"[", "2", "]"}], "]"}], "<>", 
       RowBox[{"Last", "[", 
        RowBox[{"StringSplit", "[", 
         RowBox[{"n", ",", "\"\<\\\\\>\""}], "]"}], "]"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"n", ",", "aa"}], "}"}]}], "]"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Quiet", "[", 
   RowBox[{"Do", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"CopyFile", "[", 
       RowBox[{"n", 
        RowBox[{"(*", "\:5b8c\:6574\:8def\:5f84", "*)"}], ",", 
        RowBox[{
         RowBox[{"NotebookDirectory", "[", "]"}], "<>", "\"\<my\>\"", "<>", 
         RowBox[{
          RowBox[{"StringSplit", "[", 
           RowBox[{"n", ",", "\"\<.\>\""}], "]"}], "[", 
          RowBox[{"[", "2", "]"}], "]"}], 
         RowBox[{
         "(*", "\:6784\:5efa\:7c7b\:4f3cmytxt\:7684\:76ee\:5f55", "*)"}], 
         "<>", "\"\<\\\\\>\"", "<>", 
         RowBox[{"Last", "[", 
          RowBox[{"StringSplit", "[", 
           RowBox[{"n", ",", "\"\<\\\\\>\""}], "]"}], "]"}]}]}], 
       RowBox[{"(*", 
        RowBox[{
        "\:7528", "\\\\", 
         "\:7b26\:53f7\:5206\:79bb\:4e4b\:540e\:4e4b\:53d6\:5217\:8868\:6700\
\:540e\:4e00\:4e2a\:5143\:7d20", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"c", ":"}], ",", "desktop", ",", 
           "\:65b0\:5efa\:6587\:4ef6\:5939", "\:ff0c", 
           RowBox[{"456.", "nb"}]}], "}"}]}], "*)"}], "]"}], ";", 
      RowBox[{"DeleteFile", "[", "n", "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"n", ",", "aa"}], "}"}]}], "]"}], "]"}], 
  RowBox[{"(*", 
   RowBox[{
   "\:590d\:5236\:6587\:672c\:5230\:5bf9\:5e94\:7684\:8def\:5f84", "\:ff0c", 
    "\:5e76\:5220\:6389\:8be5\:6587\:4ef6\:5b8c\:6210\:79fb\:52a8\:60c5\:5f62\
", "\:ff0c", "\:5f02\:5e38\:95ed\:5634"}], "*)"}]}]}], "Input",
 CellChangeTimes->{{3.7498713969177427`*^9, 3.749871441360734*^9}, {
   3.7498715050494647`*^9, 3.7498716076436677`*^9}, {3.7498716531647635`*^9, 
   3.7498717430385427`*^9}, {3.749871795280246*^9, 3.7498718154696856`*^9}, {
   3.749871853168559*^9, 3.7498719536321583`*^9}, 3.7498720115394726`*^9, {
   3.749872043508339*^9, 3.749872274610999*^9}, {3.7498723366657224`*^9, 
   3.7498723616593714`*^9}, {3.749872425106696*^9, 3.7498724252938967`*^9}, {
   3.7498724594767637`*^9, 3.7498724647865753`*^9}, {3.7498725276755037`*^9, 
   3.7498726453725443`*^9}},ExpressionUUID->"c16c40aa-c7c1-4848-83b4-\
2fba7069a4ea"]
},
WindowSize->{775, 569},
WindowMargins->{{200, Automatic}, {Automatic, 45}},
FrontEndVersion->"11.2 for Microsoft Windows (64-bit) (2017\:5e7410\:67082\
\:65e5)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[558, 20, 4864, 129, 324, "Input",ExpressionUUID->"c16c40aa-c7c1-4848-83b4-2fba7069a4ea"]
}
]
*)

